program Ifinstr;
var
	a:integer;
begin
	a:=1;
	if (a=1) then
		writeln(1)
	else
		writeln(0);
	if(a<1) then
		writeln(0)
	else
		writeln(1);
	if(a>1) then
		writeln(0)
	else
		writeln(1);
	if(a>=1) then
		writeln(1)
	else
		writeln(0);
	if(a<=1) then
		writeln(1)
	else
		writeln(0);
end.
